Shareware Super Platinum 8

home *** CD-ROM | disk | FTP | other *** search

/ Shareware Super Platinum 8 / Shareware Super Platinum 8.iso / mac / DATABASE / OBJ1_2.ZIP;1 / IVAR.ASM < prev next >

Wrap

Assembly Source File | 1992-06-26 | 12.8 KB | 752 lines

;…ÕÕÕÕÕÕÕÕÕÕÕÕÕÕÕÕÕÕÕÕÕÕÕÕÕÕÕÕÕÕÕÕÕÕÕÕÕÕÕÕÕÕÕÕÕÕÕÕÕÕÕÕÕÕÕÕÕÕÕÕÕÕÕÕÕÕÕÕÕÕª ;∫ o:Clip ∫ ;∫ An Object Oriented Extension to Clipper 5.01 ∫ ;∫ (c) 1991 Peter M. Freese, CyberSoft ∫ ;»ÕÕÕÕÕÕÕÕÕÕÕÕÕÕÕÕÕÕÕÕÕÕÕÕÕÕÕÕÕÕÕÕÕÕÕÕÕÕÕÕÕÕÕÕÕÕÕÕÕÕÕÕÕÕÕÕÕÕÕÕÕÕÕÕÕÕÕÕÕÕº ; ;Version 1.01x - 06/25/92 ;Modified by JHK,JHK-Software,Piestany ; IDEAL MODEL LARGE EXTRN __lbase:WORD,__eval:WORD EXTRN __cat:FAR CODESEG PROC __IVAR001 FAR PUBLIC __IVAR001 mov ax,001 jmp __IVAR ENDP __IVAR001 PROC __IVAR002 FAR PUBLIC __IVAR002 mov ax,002 jmp __IVAR ENDP __IVAR002 PROC __IVAR003 FAR PUBLIC __IVAR003 mov ax,003 jmp __IVAR ENDP __IVAR003 PROC __IVAR004 FAR PUBLIC __IVAR004 mov ax,004 jmp __IVAR ENDP __IVAR004 PROC __IVAR005 FAR PUBLIC __IVAR005 mov ax,005 jmp __IVAR ENDP __IVAR005 PROC __IVAR006 FAR PUBLIC __IVAR006 mov ax,006 jmp __IVAR ENDP __IVAR006 PROC __IVAR007 FAR PUBLIC __IVAR007 mov ax,007 jmp __IVAR ENDP __IVAR007 PROC __IVAR008 FAR PUBLIC __IVAR008 mov ax,008 jmp __IVAR ENDP __IVAR008 PROC __IVAR009 FAR PUBLIC __IVAR009 mov ax,009 jmp __IVAR ENDP __IVAR009 PROC __IVAR010 FAR PUBLIC __IVAR010 mov ax,010 jmp __IVAR ENDP __IVAR010 PROC __IVAR011 FAR PUBLIC __IVAR011 mov ax,011 jmp __IVAR ENDP __IVAR011 PROC __IVAR012 FAR PUBLIC __IVAR012 mov ax,012 jmp __IVAR ENDP __IVAR012 PROC __IVAR013 FAR PUBLIC __IVAR013 mov ax,013 jmp __IVAR ENDP __IVAR013 PROC __IVAR014 FAR PUBLIC __IVAR014 mov ax,014 jmp __IVAR ENDP __IVAR014 PROC __IVAR015 FAR PUBLIC __IVAR015 mov ax,015 jmp __IVAR ENDP __IVAR015 PROC __IVAR016 FAR PUBLIC __IVAR016 mov ax,016 jmp __IVAR ENDP __IVAR016 PROC __IVAR017 FAR PUBLIC __IVAR017 mov ax,017 jmp __IVAR ENDP __IVAR017 PROC __IVAR018 FAR PUBLIC __IVAR018 mov ax,018 jmp __IVAR ENDP __IVAR018 PROC __IVAR019 FAR PUBLIC __IVAR019 mov ax,019 jmp __IVAR ENDP __IVAR019 PROC __IVAR020 FAR PUBLIC __IVAR020 mov ax,020 jmp __IVAR ENDP __IVAR020 PROC __IVAR021 FAR PUBLIC __IVAR021 mov ax,021 jmp __IVAR ENDP __IVAR021 PROC __IVAR022 FAR PUBLIC __IVAR022 mov ax,022 jmp __IVAR ENDP __IVAR022 PROC __IVAR023 FAR PUBLIC __IVAR023 mov ax,023 jmp __IVAR ENDP __IVAR023 PROC __IVAR024 FAR PUBLIC __IVAR024 mov ax,024 jmp __IVAR ENDP __IVAR024 PROC __IVAR025 FAR PUBLIC __IVAR025 mov ax,025 jmp __IVAR ENDP __IVAR025 PROC __IVAR026 FAR PUBLIC __IVAR026 mov ax,026 jmp __IVAR ENDP __IVAR026 PROC __IVAR027 FAR PUBLIC __IVAR027 mov ax,027 jmp __IVAR ENDP __IVAR027 PROC __IVAR028 FAR PUBLIC __IVAR028 mov ax,028 jmp __IVAR ENDP __IVAR028 PROC __IVAR029 FAR PUBLIC __IVAR029 mov ax,029 jmp __IVAR ENDP __IVAR029 PROC __IVAR030 FAR PUBLIC __IVAR030 mov ax,030 jmp __IVAR ENDP __IVAR030 PROC __IVAR031 FAR PUBLIC __IVAR031 mov ax,031 jmp __IVAR ENDP __IVAR031 PROC __IVAR032 FAR PUBLIC __IVAR032 mov ax,032 jmp __IVAR ENDP __IVAR032 PROC __IVAR033 FAR PUBLIC __IVAR033 mov ax,033 jmp __IVAR ENDP __IVAR033 PROC __IVAR034 FAR PUBLIC __IVAR034 mov ax,034 jmp __IVAR ENDP __IVAR034 PROC __IVAR035 FAR PUBLIC __IVAR035 mov ax,035 jmp __IVAR ENDP __IVAR035 PROC __IVAR036 FAR PUBLIC __IVAR036 mov ax,036 jmp __IVAR ENDP __IVAR036 PROC __IVAR037 FAR PUBLIC __IVAR037 mov ax,037 jmp __IVAR ENDP __IVAR037 PROC __IVAR038 FAR PUBLIC __IVAR038 mov ax,038 jmp __IVAR ENDP __IVAR038 PROC __IVAR039 FAR PUBLIC __IVAR039 mov ax,039 jmp __IVAR ENDP __IVAR039 PROC __IVAR040 FAR PUBLIC __IVAR040 mov ax,040 jmp __IVAR ENDP __IVAR040 PROC __IVAR041 FAR PUBLIC __IVAR041 mov ax,041 jmp __IVAR ENDP __IVAR041 PROC __IVAR042 FAR PUBLIC __IVAR042 mov ax,042 jmp __IVAR ENDP __IVAR042 PROC __IVAR043 FAR PUBLIC __IVAR043 mov ax,043 jmp __IVAR ENDP __IVAR043 PROC __IVAR044 FAR PUBLIC __IVAR044 mov ax,044 jmp __IVAR ENDP __IVAR044 PROC __IVAR045 FAR PUBLIC __IVAR045 mov ax,045 jmp __IVAR ENDP __IVAR045 PROC __IVAR046 FAR PUBLIC __IVAR046 mov ax,046 jmp __IVAR ENDP __IVAR046 PROC __IVAR047 FAR PUBLIC __IVAR047 mov ax,047 jmp __IVAR ENDP __IVAR047 PROC __IVAR048 FAR PUBLIC __IVAR048 mov ax,048 jmp __IVAR ENDP __IVAR048 PROC __IVAR049 FAR PUBLIC __IVAR049 mov ax,049 jmp __IVAR ENDP __IVAR049 PROC __IVAR050 FAR PUBLIC __IVAR050 mov ax,050 jmp __IVAR ENDP __IVAR050 PROC __IVAR051 FAR PUBLIC __IVAR051 mov ax,051 jmp __IVAR ENDP __IVAR051 PROC __IVAR052 FAR PUBLIC __IVAR052 mov ax,052 jmp __IVAR ENDP __IVAR052 PROC __IVAR053 FAR PUBLIC __IVAR053 mov ax,053 jmp __IVAR ENDP __IVAR053 PROC __IVAR054 FAR PUBLIC __IVAR054 mov ax,054 jmp __IVAR ENDP __IVAR054 PROC __IVAR055 FAR PUBLIC __IVAR055 mov ax,055 jmp __IVAR ENDP __IVAR055 PROC __IVAR056 FAR PUBLIC __IVAR056 mov ax,056 jmp __IVAR ENDP __IVAR056 PROC __IVAR057 FAR PUBLIC __IVAR057 mov ax,057 jmp __IVAR ENDP __IVAR057 PROC __IVAR058 FAR PUBLIC __IVAR058 mov ax,058 jmp __IVAR ENDP __IVAR058 PROC __IVAR059 FAR PUBLIC __IVAR059 mov ax,059 jmp __IVAR ENDP __IVAR059 PROC __IVAR060 FAR PUBLIC __IVAR060 mov ax,060 jmp __IVAR ENDP __IVAR060 PROC __IVAR061 FAR PUBLIC __IVAR061 mov ax,061 jmp __IVAR ENDP __IVAR061 PROC __IVAR062 FAR PUBLIC __IVAR062 mov ax,062 jmp __IVAR ENDP __IVAR062 PROC __IVAR063 FAR PUBLIC __IVAR063 mov ax,063 jmp __IVAR ENDP __IVAR063 PROC __IVAR064 FAR PUBLIC __IVAR064 mov ax,064 jmp __IVAR ENDP __IVAR064 PROC __IVAR065 FAR PUBLIC __IVAR065 mov ax,065 jmp __IVAR ENDP __IVAR065 PROC __IVAR066 FAR PUBLIC __IVAR066 mov ax,066 jmp __IVAR ENDP __IVAR066 PROC __IVAR067 FAR PUBLIC __IVAR067 mov ax,067 jmp __IVAR ENDP __IVAR067 PROC __IVAR068 FAR PUBLIC __IVAR068 mov ax,068 jmp __IVAR ENDP __IVAR068 PROC __IVAR069 FAR PUBLIC __IVAR069 mov ax,069 jmp __IVAR ENDP __IVAR069 PROC __IVAR070 FAR PUBLIC __IVAR070 mov ax,070 jmp __IVAR ENDP __IVAR070 PROC __IVAR071 FAR PUBLIC __IVAR071 mov ax,071 jmp __IVAR ENDP __IVAR071 PROC __IVAR072 FAR PUBLIC __IVAR072 mov ax,072 jmp __IVAR ENDP __IVAR072 PROC __IVAR073 FAR PUBLIC __IVAR073 mov ax,073 jmp __IVAR ENDP __IVAR073 PROC __IVAR074 FAR PUBLIC __IVAR074 mov ax,074 jmp __IVAR ENDP __IVAR074 PROC __IVAR075 FAR PUBLIC __IVAR075 mov ax,075 jmp __IVAR ENDP __IVAR075 PROC __IVAR076 FAR PUBLIC __IVAR076 mov ax,076 jmp __IVAR ENDP __IVAR076 PROC __IVAR077 FAR PUBLIC __IVAR077 mov ax,077 jmp __IVAR ENDP __IVAR077 PROC __IVAR078 FAR PUBLIC __IVAR078 mov ax,078 jmp __IVAR ENDP __IVAR078 PROC __IVAR079 FAR PUBLIC __IVAR079 mov ax,079 jmp __IVAR ENDP __IVAR079 PROC __IVAR080 FAR PUBLIC __IVAR080 mov ax,080 jmp __IVAR ENDP __IVAR080 PROC __IVAR081 FAR PUBLIC __IVAR081 mov ax,081 jmp __IVAR ENDP __IVAR081 PROC __IVAR082 FAR PUBLIC __IVAR082 mov ax,082 jmp __IVAR ENDP __IVAR082 PROC __IVAR083 FAR PUBLIC __IVAR083 mov ax,083 jmp __IVAR ENDP __IVAR083 PROC __IVAR084 FAR PUBLIC __IVAR084 mov ax,084 jmp __IVAR ENDP __IVAR084 PROC __IVAR085 FAR PUBLIC __IVAR085 mov ax,085 jmp __IVAR ENDP __IVAR085 PROC __IVAR086 FAR PUBLIC __IVAR086 mov ax,086 jmp __IVAR ENDP __IVAR086 PROC __IVAR087 FAR PUBLIC __IVAR087 mov ax,087 jmp __IVAR ENDP __IVAR087 PROC __IVAR088 FAR PUBLIC __IVAR088 mov ax,088 jmp __IVAR ENDP __IVAR088 PROC __IVAR089 FAR PUBLIC __IVAR089 mov ax,089 jmp __IVAR ENDP __IVAR089 PROC __IVAR090 FAR PUBLIC __IVAR090 mov ax,090 jmp __IVAR ENDP __IVAR090 PROC __IVAR091 FAR PUBLIC __IVAR091 mov ax,091 jmp __IVAR ENDP __IVAR091 PROC __IVAR092 FAR PUBLIC __IVAR092 mov ax,092 jmp __IVAR ENDP __IVAR092 PROC __IVAR093 FAR PUBLIC __IVAR093 mov ax,093 jmp __IVAR ENDP __IVAR093 PROC __IVAR094 FAR PUBLIC __IVAR094 mov ax,094 jmp __IVAR ENDP __IVAR094 PROC __IVAR095 FAR PUBLIC __IVAR095 mov ax,095 jmp __IVAR ENDP __IVAR095 PROC __IVAR096 FAR PUBLIC __IVAR096 mov ax,096 jmp __IVAR ENDP __IVAR096 PROC __IVAR097 FAR PUBLIC __IVAR097 mov ax,097 jmp __IVAR ENDP __IVAR097 PROC __IVAR098 FAR PUBLIC __IVAR098 mov ax,098 jmp __IVAR ENDP __IVAR098 PROC __IVAR099 FAR PUBLIC __IVAR099 mov ax,099 jmp __IVAR ENDP __IVAR099 PROC __IVAR100 FAR PUBLIC __IVAR100 mov ax,100 jmp __IVAR ENDP __IVAR100 PROC __IVAR101 FAR PUBLIC __IVAR101 mov ax,101 jmp __IVAR ENDP __IVAR101 PROC __IVAR102 FAR PUBLIC __IVAR102 mov ax,102 jmp __IVAR ENDP __IVAR102 PROC __IVAR103 FAR PUBLIC __IVAR103 mov ax,103 jmp __IVAR ENDP __IVAR103 PROC __IVAR104 FAR PUBLIC __IVAR104 mov ax,104 jmp __IVAR ENDP __IVAR104 PROC __IVAR105 FAR PUBLIC __IVAR105 mov ax,105 jmp __IVAR ENDP __IVAR105 PROC __IVAR106 FAR PUBLIC __IVAR106 mov ax,106 jmp __IVAR ENDP __IVAR106 PROC __IVAR107 FAR PUBLIC __IVAR107 mov ax,107 jmp __IVAR ENDP __IVAR107 PROC __IVAR108 FAR PUBLIC __IVAR108 mov ax,108 jmp __IVAR ENDP __IVAR108 PROC __IVAR109 FAR PUBLIC __IVAR109 mov ax,109 jmp __IVAR ENDP __IVAR109 PROC __IVAR110 FAR PUBLIC __IVAR110 mov ax,110 jmp __IVAR ENDP __IVAR110 PROC __IVAR111 FAR PUBLIC __IVAR111 mov ax,111 jmp __IVAR ENDP __IVAR111 PROC __IVAR112 FAR PUBLIC __IVAR112 mov ax,112 jmp __IVAR ENDP __IVAR112 PROC __IVAR113 FAR PUBLIC __IVAR113 mov ax,113 jmp __IVAR ENDP __IVAR113 PROC __IVAR114 FAR PUBLIC __IVAR114 mov ax,114 jmp __IVAR ENDP __IVAR114 PROC __IVAR115 FAR PUBLIC __IVAR115 mov ax,115 jmp __IVAR ENDP __IVAR115 PROC __IVAR116 FAR PUBLIC __IVAR116 mov ax,116 jmp __IVAR ENDP __IVAR116 PROC __IVAR117 FAR PUBLIC __IVAR117 mov ax,117 jmp __IVAR ENDP __IVAR117 PROC __IVAR118 FAR PUBLIC __IVAR118 mov ax,118 jmp __IVAR ENDP __IVAR118 PROC __IVAR119 FAR PUBLIC __IVAR119 mov ax,119 jmp __IVAR ENDP __IVAR119 PROC __IVAR120 FAR PUBLIC __IVAR120 mov ax,120 jmp __IVAR ENDP __IVAR120 PROC __IVAR FAR push [__eval] mov bx,0FFFFh push bx push ax ; cargo index number mov ax,[__lbase] add ax,14 push ax call far __cat add sp,8 retf ENDP __IVAR END